answer "You can't make a label based on this card!" with "OK"
end mouseUp
-- part 76 (button)
-- low flags: 00
-- high flags: 0000
-- rect: left=451 top=23 right=72 bottom=511
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 1
-- font id: 0
-- text size: 12
-- style flags: 0
-- line height: 16
-- part name: No Go 2
----- HyperTalk script -----
on mouseUp
play "beeper" tempo 300 "a#7"
answer "Print Help Card?" with "OK" or "Cancel"
if it is "Cancel" then exit mouseup
else
open printing with dialog
print this card
close printing
end if
end mouseUp
-- part 77 (button)
-- low flags: 00
-- high flags: 2000
-- rect: left=452 top=178 right=230 bottom=510
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 1
-- font id: 0
-- text size: 12
-- style flags: 0
-- line height: 16
-- part name: no go 3
----- HyperTalk script -----
on mouseUp
play "beeper" tempo 300 "a#7"
answer "You can't delete this card!" with "OK"
end mouseUp
-- part 78 (button)
-- low flags: 00
-- high flags: 2000
-- rect: left=4 top=178 right=229 bottom=60
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 1
-- font id: 0
-- text size: 12
-- style flags: 0
-- line height: 16
-- part name: no go 4
----- HyperTalk script -----
on mouseUp
play "beeper" tempo 300 "a#7"
answer "You don't need a new field here!" with "OK"
end mouseUp
-- part 79 (field)
-- low flags: 01
-- high flags: 2007
-- rect: left=63 top=69 right=282 bottom=449
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 0
-- font id: 3
-- text size: 12
-- style flags: 0
-- line height: 16
-- part name: stuff
-- part 80 (field)
-- low flags: 01
-- high flags: 2004
-- rect: left=114 top=23 right=67 bottom=396
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 1
-- font id: 3
-- text size: 12
-- style flags: 4608
-- line height: 16
-- part name:
-- part 81 (button)
-- low flags: 00
-- high flags: 2000
-- rect: left=225 top=310 right=340 bottom=259
-- title width / last selected line: 0
-- icon id / first selected line: 128 / 128
-- text alignment: 1
-- font id: 0
-- text size: 12
-- style flags: 0
-- line height: 16
-- part name: Return
----- HyperTalk script -----
on mouseUp
play "beeper" tempo 300 "a#7"
visual effect checkerboard
pop card
end mouseUp
-- part contents for card part 80
----- text -----
Label Factory 1.0
On-Screen Help
-- part contents for card part 79
----- text -----
"Help" Brings you to this screen from where-ever you are. Clicking the button while on this screen does nothing. To return from here to the last card you were on, press the "carriage-return" type button on the bottom of this screen (the leftmost of the group of 3). If you need HyperCard help, use the menu-item under the "Go" menu (or Command-?).
"Home" sends you back to your Home card. If there is more than 5K of free space in the stack, it compresses itself. It also resets your userLevel to to what it was before you opened The Label Factory. Using command-h or the "Home" menu-item bypasses the compression but still resets the userLevel.
"Credits" sends you to the "ego" screen. Clicking on the Credits screen returns you to the most recent card (the one you went to "Credits" from).
"New Field" is simply an easier way to generate a new field. The button is identical to the menu-item of the same name. Use this button to place a new text field on a label. Drag the field to where you want it and drag the corners to resize it. You can delete any selected field with the delete key. Select the Browse tool (the hand - you can get it with command-tab if you want) and click in a field to enter the song lists or whatever.
"Installer" invokes the install routine that will install The Label Factory button in your home card. The process is self-explanatory. It leaves you at home to try the button out rather than returning you here. It does not install pathnames for you (I always hated that - I move stuff from floppy to floppy all the time). Let HyperCard figure out where to find the stack. Thanks to Danny Goodman for the ideas on the installer.
"Print Label" hides all the screen buttons and gives you a print dialog. Be sure to select full-sized-cards for printing labels. If there is a problem printing ("Printer not found", etc.) we've found that our script cancels and leaves the screen buttons hidden. click the middle button on the bottom of the screen ("Cassette Stop" - it's the only button not hidden) to refresh all screen buttons. Remember to have the font outline files in the system folder for PostScript output.
"Scan All" scans through all of the cards so that you can quickly see each of them (nice for quickly showing off all your cool labels). It ends the scan on the card you started from.
"New Label" creates a new label based on the current one. It does not blank existing fields due to the fact that you may want to re-use the information. A dialog box pops-up after you create a new label to let you know that you're looking at the new label and not the old one (anti-confusion dialog).
"Delete Card" removes the current label from the stack. You have an opportunity to back out, and you can't delete the title, help, or credits card. You can't delete the first label either. That protects you from deleting ALL of the labels and having nothing upon which to base a new label.
"Typeface" allows you to change the font, size, and style for a given field. Click in the field first, and then click "Typeface". Set the font, size, alignment, and style the way you want it, and then click OK. I usually type everything in Geneva, then change it later before printing. Note that the typeface for a given field is in effect for the ENTIRE field. To combine different typefaces in a single region, simply overlay different transparent fields.
"Find" prompts you for a string to "hunt down". It'll find text in any field in the stack. Use it for finding a particular label (i.e. Find "Janis" to go to a label of a Janis Joplin tape).
"Next Arrow" looks like a tape deck's fast forward button. Use it to go to the next label. Hold it down to go through a bunch and let go when you want to stop.
"Prev Arrow" looks like a tape deck's rewind button. Use it to go to the previous label. Hold it down to go through a bunch and let go when you want to stop.
"Refresh" looks like a tape deck's stop button. Use it to refresh the screen buttons in the event that they get hidden (printing errors). Pressing this button at other times does nothing.
"End" looks like a tape deck's play button with a vertical line in front of it. It simply goes to the last label.
"Return" looks like a "carriage-return" and returns you from this screen to the previous card (the one you left from).
(CDRM1080320)(1993).iso/FILES/HYP/J-M/LabelF1ß.cpt/Label Factory 1.0/card_5644_render.png){kind=link}
(CDRM1080320)(1993).iso/FILES/HYP/J-M/LabelF1ß.cpt/Label Factory 1.0/card_6355_render.png){kind=link}